home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / gnustuff / tos / updates / update28.zoo / gemlib / diffs
Encoding:
Text File  |  1993-02-22  |  54.7 KB  |  1,801 lines
  1. ===================================================================
  2. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/Changelog,v
  3. retrieving revision 1.20
  4. diff -c -r1.20 Changelog
  5. *** 1.20    1992/12/28 08:07:07
  6. --- Changelog    1993/02/22 06:07:35
  7. ***************
  8. *** 299,301 ****
  9. --- 299,346 ----
  10.   gemfast.h:: ++jrb
  11.       sync with mntlib 25
  12.   ------------------------------- Patchlevel 26------------------------
  13. + 
  14. + gemfast.h:: ++jrb
  15. +     add new types for popup menus (falcon aes)
  16. +     dont declare _addrin/_addrout for gcc, because they are # defines
  17. +     in our case, not real arrays. (see common.h)
  18. + 
  19. + aesmenu:: ++jrb
  20. +     new bindings for popup/scroll menus (falcon aes)
  21. +         menu_popup() menu_attach() menu_istart() menu_settings()
  22. + 
  23. + aesbind.h:: ++jrb
  24. +     add protos for new bindings.
  25. + 
  26. + mincl:: ++jrb
  27. +     add targets for  new menu_*() fns
  28. + 
  29. + vdibez.c:: ++jrb
  30. +     bring stuff in sync with the bez docs in SpeedoGdos. no new
  31. +         functions. just more info about the old ones, and some of the
  32. +     bindings have  contrl[2|4] set to specific values (and the
  33. +     docs dont say why!).
  34. + 
  35. + vdiinq.c:: ++jrb
  36. +     updated the comment at the top about vqt_name() since its
  37. +     official now in the SpeedoGDOS docs.
  38. + 
  39. + vdifsm.c:: ++jrb
  40. +     v_killoutline() doesnt exist any more
  41. +     v_getoutline() is totally changed
  42. +     vst_error() -- make it 16/32 bit clean.
  43. +     vqt_advance32() -- new fn
  44. +     vst_setsize32() -- new fn
  45. +         vst_arbpt32() -- new fn
  46. +     v_ftext_offset() -- new fn
  47. +     vst_charmap() -- new fn
  48. +     vst_kern() -- new fn
  49. +     vqt_fontheader() -- new fn
  50. +     vqt_trackkern() -- new fn
  51. +     vqt_pairkern() -- new fn
  52. +     v_getbitmap_info() -- totally new
  53. + 
  54. + mincl, vdibind.h:: ++jrb
  55. +     adjust for above changes.
  56. + 
  57. + ------------------------------- Patchlevel 27 -------------------------------
  58. ===================================================================
  59. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/PatchLev.h,v
  60. retrieving revision 1.18
  61. diff -c -r1.18 PatchLev.h
  62. *** 1.18    1992/12/28 08:07:08
  63. --- PatchLev.h    1993/02/22 06:07:36
  64. ***************
  65. *** 1,4 ****
  66. ! #define PatchLevel "26"
  67.   
  68.   /*
  69.    *    the Patch Level above is to identify the version
  70. --- 1,4 ----
  71. ! #define PatchLevel "27"
  72.   
  73.   /*
  74.    *    the Patch Level above is to identify the version
  75. ===================================================================
  76. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/aesbind.h,v
  77. retrieving revision 1.11
  78. diff -c -r1.11 aesbind.h
  79. *** 1.11    1992/06/03 19:04:28
  80. --- aesbind.h    1993/02/22 06:07:39
  81. ***************
  82. *** 14,20 ****
  83.   __EXTERN int    appl_init __PROTO((void));
  84.   __EXTERN int    appl_read __PROTO((int ApId, int Length, void *ApPbuff));
  85.   __EXTERN int    appl_write __PROTO((int ApId, int Length, void *ApPbuff));
  86. ! __EXTERN int    appl_find __PROTO((char *Name));
  87.   __EXTERN int    appl_tplay __PROTO((void *Mem, int Num, int Scale));
  88.   __EXTERN int    appl_trecord __PROTO((void *Mem, int Count));
  89.   __EXTERN int    appl_exit __PROTO((void));
  90. --- 14,20 ----
  91.   __EXTERN int    appl_init __PROTO((void));
  92.   __EXTERN int    appl_read __PROTO((int ApId, int Length, void *ApPbuff));
  93.   __EXTERN int    appl_write __PROTO((int ApId, int Length, void *ApPbuff));
  94. ! __EXTERN int    appl_find __PROTO((const char *Name));
  95.   __EXTERN int    appl_tplay __PROTO((void *Mem, int Num, int Scale));
  96.   __EXTERN int    appl_trecord __PROTO((void *Mem, int Count));
  97.   __EXTERN int    appl_exit __PROTO((void));
  98. ***************
  99. *** 92,98 ****
  100. --- 92,106 ----
  101.   __EXTERN int    menu_tnormal __PROTO((void *Tree, int Item, int NormalFlag));
  102.   __EXTERN int    menu_text __PROTO((void *Tree, int Item, char *Text));
  103.   __EXTERN int    menu_register __PROTO((int ApId, char *MenuText));
  104. + __EXTERN int    menu_popup __PROTO((MENU *me_menu, int me_xpos, int me_ypos,
  105. +                                     MENU *me_mdata));
  106. + __EXTERN int    menu_attach __PROTO((int me_flag, OBJECT *me_tree, int me_item,
  107. +                                      MENU *me_mdata));
  108. + __EXTERN int    menu_istart __PROTO((int me_flag, OBJECT *me_tree,
  109. +                                      int me_imenu, int me_item));
  110. + __EXTERN int    menu_settings __PROTO((int me_flag, MN_SET *me_values));
  111.   
  112. + 
  113.   __EXTERN int    objc_add __PROTO((void *Tree, int Parent, int Child));
  114.   __EXTERN int    objc_delete __PROTO((void *Tree, int Object));
  115.   __EXTERN int    objc_draw __PROTO((void *Tree, int Start, int Depth, int Cx,
  116. ***************
  117. *** 101,108 ****
  118. --- 109,121 ----
  119.                      int My));
  120.   __EXTERN int    objc_offset __PROTO((void *Tree, int Object, int *X, int *Y));
  121.   __EXTERN int    objc_order __PROTO((void *Tree, int Object, int NewPos));
  122. + #ifdef __TCC_GEMLIB__
  123. + __EXTERN int    objc_edit __PROTO((void *Tree, int Object, int Char, int *Index,
  124. +                    int Kind)); 
  125. + #else
  126.   __EXTERN int    objc_edit __PROTO((void *Tree, int Object, int Char, int Index,
  127.                      int Kind, int *NewIndex)); 
  128. + #endif
  129.   __EXTERN int    objc_change __PROTO((void *Tree, int Object, int Res, int Cx,
  130.                        int Cy, int Cw, int Ch, int NewState,
  131.                        int Redraw));
  132. ***************
  133. *** 134,141 ****
  134. --- 147,158 ----
  135.                      int Wh));
  136.   __EXTERN int    wind_close __PROTO((int WindowHandle));
  137.   __EXTERN int    wind_delete __PROTO((int WindowHandle));
  138. + #ifdef __TCC_GEMLIB__
  139. + __EXTERN int    wind_get __PROTO((int WindowHandle, int What, ...));
  140. + #else
  141.   __EXTERN int    wind_get __PROTO((int WindowHandle, int What,
  142.                     int *W1, int *W2, int *W3, int *W4)); 
  143. + #endif
  144.   __EXTERN int    wind_set __PROTO((int WindowHandle, int What, ...));
  145.   __EXTERN int    wind_find __PROTO((int X, int Y));
  146.   __EXTERN int    wind_update __PROTO((int Code));
  147. ===================================================================
  148. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/aesmenu.c,v
  149. retrieving revision 1.5
  150. diff -c -r1.5 aesmenu.c
  151. *** 1.5    1991/09/06 02:10:31
  152. --- aesmenu.c    1993/02/22 06:07:41
  153. ***************
  154. *** 7,12 ****
  155. --- 7,16 ----
  156.    *        menu_tnormal    Display a menu item in normal/rev video
  157.    *        menu_text        Change the text of a menu item
  158.    *        menu_register    Put desk accessory menu item in Desk menu
  159. +  *          menu_popup          Display a popup menu
  160. +  *          menu_attach         Attach, change, remove or inq about a submenu
  161. +  *          menu_istart         Set / inq about starting menu item of a submenu
  162. +  *          menu_settings       Set / inq submenu delay/scroll values
  163.    *
  164.    *        ++jrb    bammi@cadence.com
  165.    *        modified: mj -- ntomczak@vm.ucs.ualberta.ca
  166. ***************
  167. *** 21,26 ****
  168. --- 25,34 ----
  169.   #define L_menu_tno
  170.   #define L_menu_tex
  171.   #define L_menu_reg
  172. + #define L_menu_pop
  173. + #define L_menu_att
  174. + #define L_menu_ist
  175. + #define L_menu_set
  176.   
  177.   #endif /* __DEF_ALL__ */
  178.   
  179. ***************
  180. *** 113,117 ****
  181. --- 121,208 ----
  182.       return __aes__(AES_CONTROL_ENCODE(35, 1, 1, 1));
  183.   }
  184.   #endif /* L_menu_reg */
  185. + 
  186. + #include <gemfast.h> /* for MENU, OBJECT etc */
  187. + 
  188. + #ifdef L_menu_pop
  189. + 
  190. + /* Allows an application to display a popup menu anywhere on the screen.  The
  191. +  * popup menu may also have submenus.  If the number of menu items exceed the
  192. +  * menu scroll height, the menu may also be set to scroll.  menu_settings can
  193. +  * be used to set the height at which all menus will start to scroll.
  194. +  *
  195. +  * returns 0 on failure, and data in me_data is invalid
  196. +  * returns 1 on success, data in me_data is valid
  197. +  */
  198. + int menu_popup(MENU *me_menu, int me_xpos, int me_ypos, MENU *me_mdata)
  199. + {
  200. +     _int_in[0]   =  me_xpos;
  201. +     _int_in[1]   =  me_ypos;
  202. + 
  203. +     _addrin[0]  =  me_menu;
  204. +     _addrin[1]  =  me_mdata;
  205. +     
  206. +     return __aes__(AES_CONTROL_ENCODE(36, 2, 1, 2));
  207. + }
  208. + #endif /* L_menu_pop */
  209. + 
  210. + #ifdef L_menu_att
  211. + 
  212. + /* Allows an application to attach, change, remove or inquire about a submenu
  213. +  * associated with a menu item.
  214. +  *
  215. +  * returns:0 failure: the submenu was not attached for whatever reasons
  216. +  *         1 success: the submenu was attached, changed or removed successfully
  217. +  */
  218. + int menu_attach(int me_flag, OBJECT *me_tree, int me_item, MENU *me_mdata)
  219. + {
  220. +     _int_in[0] = me_flag;
  221. +     _int_in[1] = me_item;
  222. + 
  223. +     _addrin[0] = me_tree;
  224. +     _addrin[1] = me_mdata;
  225. +     return __aes__(AES_CONTROL_ENCODE(37, 2, 1, 2));
  226. + }
  227. + #endif /*  L_menu_att */
  228. + 
  229. + #ifdef L_menu_ist
  230. + 
  231. + /* Allows an application to set or inquire the starting menu item of a submenu
  232. +  * that is associated with a menu item.  The submenu is shifted vertically so
  233. +  * that the starting menu item is aligned with the menu item that is associated
  234. +  * with this submenu.  
  235. +  *
  236. +  * returns: 0 failure: the submenu is not associated with a menu item.  The
  237. +  *                     submenu must be attached via menu_attach before this
  238. +  *                     call can be made. 
  239. +  *         >0 success: the starting menu item is currently set to this value.
  240. +  */
  241. + int menu_istart(int me_flag, OBJECT *me_tree, int me_imenu, int me_item)
  242. + {
  243. +     _int_in[0] = me_flag;
  244. +     _int_in[1] = me_imenu;
  245. +     _int_in[2] = me_item;
  246. + 
  247. +     _addrin[0] =  me_tree;
  248. + 
  249. +     return __aes__(AES_CONTROL_ENCODE(38, 3, 1, 1));
  250. + }
  251. + #endif /* L_menu_ist */
  252. + 
  253. + #ifdef L_menu_set
  254. + 
  255. + /* Allows an application to set or inquire the submenu delay values and the
  256. +  * menu scroll height value. 
  257. +  *
  258. +  * returns 1 always
  259. +  */
  260. + int menu_settings(int me_flag, MN_SET *me_values)
  261. + {
  262. +     _int_in[0] = me_flag;
  263. +     
  264. +     _addrin[0] = me_values;
  265. +     return __aes__(AES_CONTROL_ENCODE(39, 1, 1, 1));
  266. + }    
  267. + #endif /* L_menu_set */
  268.   
  269.   /* - eof - */
  270. ===================================================================
  271. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/common.h,v
  272. retrieving revision 1.10
  273. diff -c -r1.10 common.h
  274. *** 1.10    1991/09/06 02:10:31
  275. --- common.h    1993/02/22 06:07:42
  276. ***************
  277. *** 5,12 ****
  278.    *
  279.    *    modified:  mj --  ntomczak@vm.ucs.ualberta.ca
  280.    */
  281.   
  282. - 
  283.   /* Array sizes in vdi control block */
  284.   
  285.   #define CNTRLMAX    12   /* It seems that 11 is enough - max reached
  286. --- 5,13 ----
  287.    *
  288.    *    modified:  mj --  ntomczak@vm.ucs.ualberta.ca
  289.    */
  290. + #ifndef _COMMON_H
  291. + #define _COMMON_H
  292.   
  293.   /* Array sizes in vdi control block */
  294.   
  295.   #define CNTRLMAX    12   /* It seems that 11 is enough - max reached
  296. ***************
  297. *** 90,92 ****
  298. --- 91,95 ----
  299.   /* vdi trap interface func */
  300.   void __vdi__(unsigned long coded_contrl, int handle);
  301.   void vdi(void);
  302. + 
  303. + #endif /* _COMMON_H */
  304. ===================================================================
  305. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/gemfast.h,v
  306. retrieving revision 1.12
  307. diff -c -r1.12 gemfast.h
  308. *** 1.12    1992/12/28 08:07:11
  309. --- gemfast.h    1993/02/22 06:07:43
  310. ***************
  311. *** 1,6 ****
  312. --- 1,10 ----
  313.   #ifndef _GEMFAST_H
  314.   #define _GEMFAST_H
  315.   
  316. + #ifndef _COMPILER_H
  317. + # include <compiler.h>
  318. + #endif
  319. + 
  320.   #ifdef __cplusplus
  321.   extern "C" {
  322.   #endif
  323. ***************
  324. *** 236,241 ****
  325. --- 240,246 ----
  326.   #define TOUCHEXIT    0x0040
  327.   #define HIDETREE    0x0080
  328.   #define INDIRECT    0x0100
  329. + #define SUBMENU         0x0800          /* falcon aes hierarchical menus */
  330.           /* Object states */
  331.   #define NORMAL         0x0000
  332.   #define SELECTED    0x0001
  333. ***************
  334. *** 284,292 ****
  335. --- 289,301 ----
  336.   
  337.   typedef struct
  338.   {
  339. + #ifdef __TCC_COMPAT__
  340. +     void        *fd_addr;
  341. + #else /* !__TCC_COMPAT__ */
  342.       long        fd_addr;    /* Addrerss of upper left corner of first*/
  343.                                       /* plane of raster area. If NULL then   */
  344.                                       /* MFDB is for a physical device        */
  345. + #endif /* !__TCC_COMPAT__ */
  346.       short        fd_w;        /* Form Width in Pixels                 */
  347.       short        fd_h;       /* Form Height in Pixels                */
  348.       short        fd_wdwidth; /* Form Width in shorts(fd_w/sizeof(int)*/
  349. ***************
  350. *** 421,432 ****
  351.   
  352.       } BITBLK;
  353.   
  354. - typedef struct user_block
  355. -     {
  356. -         int  (*ub_code)(void *parmblock); /* really PARMBLK *parmblock */
  357. -     long ub_parm;
  358. -     } USERBLK;
  359. - 
  360.   #ifndef __TCC_COMPAT__
  361.   typedef struct object
  362.       {
  363. --- 430,435 ----
  364. ***************
  365. *** 445,459 ****
  366.   #else
  367.   
  368.   typedef struct {
  369. !     unsigned short character   :  8;
  370. !     signed   short framesize   :  8;
  371. !     unsigned short framecol    :  4;
  372. !     unsigned short textcol     :  4;
  373. !     unsigned short textmode    :  1;
  374. !     unsigned short fillpattern :  3;
  375. !     unsigned short interiorcol :  4;
  376.   } bfobspec;
  377.   
  378.   typedef union __u_ob_spec {
  379.       TEDINFO        *tedinfo;
  380.       long        index;
  381. --- 448,464 ----
  382.   #else
  383.   
  384.   typedef struct {
  385. !     unsigned int character   :  8;
  386. !     signed   int framesize   :  8;
  387. !     unsigned int framecol    :  4;
  388. !     unsigned int textcol     :  4;
  389. !     unsigned int textmode    :  1;
  390. !     unsigned int fillpattern :  3;
  391. !     unsigned int interiorcol :  4;
  392.   } bfobspec;
  393.   
  394. + struct user_block;    /* forward declaration */
  395. + 
  396.   typedef union __u_ob_spec {
  397.       TEDINFO        *tedinfo;
  398.       long        index;
  399. ***************
  400. *** 462,468 ****
  401.           bfobspec    obspec;
  402.       BITBLK        *bitblk;
  403.       ICONBLK        *iconblk;
  404. !         USERBLK     *userblk;
  405.   /*    APPLBLK        *applblk;
  406.       char        *string;    */
  407.   } U_OB_SPEC;
  408. --- 467,473 ----
  409.           bfobspec    obspec;
  410.       BITBLK        *bitblk;
  411.       ICONBLK        *iconblk;
  412. !     struct user_block *userblk;
  413.   /*    APPLBLK        *applblk;
  414.       char        *string;    */
  415.   } U_OB_SPEC;
  416. ***************
  417. *** 494,499 ****
  418. --- 499,514 ----
  419.       long     pb_parm;
  420.       } PARMBLK;
  421.   
  422. + typedef struct user_block
  423. +     {
  424. + #ifdef __TCC_COMPAT__
  425. +         int __CDECL (*ub_code)(PARMBLK *parmblock);
  426. + #else
  427. +         int __CDECL (*ub_code)(void *parmblock); /* really PARMBLK *parmblock */
  428. + #endif
  429. +     long ub_parm;
  430. +     } USERBLK;
  431. + 
  432.                           /* used in RSCREATE.C    */
  433.   typedef struct rshdr
  434.   {
  435. ***************
  436. *** 519,527 ****
  437. --- 534,586 ----
  438.   
  439.   #define DESKTOP_HANDLE 0
  440.   
  441. + /* falcon aes menu_popup and menu_attach structure for passing and receiving
  442. +  * submenu data.
  443. +  */
  444. + 
  445. + typedef struct _menu
  446. + {
  447. +     OBJECT *mn_tree;    /* the object tree of the menu */
  448. +     short   mn_menu;    /* the parent object of the menu items */
  449. +     short   mn_item;    /* the starting menu item */
  450. +     short   mn_scroll;  /* the scroll field status of the menu 
  451. +                            0  - The menu will not scroll
  452. +                            !0 - The menu will scroll if the number of menu
  453. +                                 items exceed the menu scroll height. The 
  454. +                 non-zero value is the object at which 
  455. +                 scrolling will begin.  This will allow one
  456. +                 to have a menu in which the scrollable region
  457. +                 is only a part of the whole menu.  The value
  458. +                 must be a menu item in the menu.
  459. +                 
  460. +                                 menu_settings can be used to change the menu
  461. +                                 scroll height. 
  462. + 
  463. +                          NOTE: If the scroll field status is !0, the menu
  464. +                                items must consist entirely of G_STRINGS. */
  465. +     short   mn_keystate; /* The CTRL, ALT, SHIFT Key state at the time the
  466. +                 mouse button was pressed. */
  467. + } MENU;
  468. + 
  469. + /* menu_settings uses a new structure for setting and inquiring the submenu
  470. +  * delay values and the menu scroll height.  The delay values are measured in
  471. +  * milliseconds and the height is based upon the number of menu items.
  472. +  */
  473. + 
  474. + typedef struct _mn_set
  475. + {
  476. +     long Display;    /*  the submenu display delay     */
  477. +     long Drag;       /*  the submenu drag delay        */
  478. +     long Delay;      /*  the single-click scroll delay */
  479. +     long Speed;      /*  the continuous scroll delay   */
  480. +     short Height;    /*  the menu scroll height        */
  481. + } MN_SET;
  482. + 
  483.   /* (user visible) binding arrays */
  484.   extern short         _intin[], _intout[], _ptsin[], _ptsout[];
  485. + #ifndef __GNUC__ /* for gcc see common.h in gemlib */
  486.   extern void          *_addrin[], *_addrout[];
  487. + #endif
  488.   extern int        gl_apid, gl_ap_version;
  489.   
  490.   #ifdef __cplusplus
  491. ===================================================================
  492. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/mincl,v
  493. retrieving revision 1.8
  494. diff -c -r1.8 mincl
  495. *** 1.8    1992/04/19 16:47:42
  496. --- mincl    1993/02/22 06:07:45
  497. ***************
  498. *** 26,33 ****
  499.         shel_put.o 
  500.   
  501.   AESMENU = menu_bar.o menu_ich.o menu_ien.o menu_tno.o menu_tex.o \
  502. !       menu_reg.o 
  503.   
  504.   AESOBJ = objc_add.o objc_del.o objc_dra.o objc_fin.o objc_off.o \
  505.        objc_ord.o objc_edi.o objc_cha.o 
  506.   
  507. --- 26,34 ----
  508.         shel_put.o 
  509.   
  510.   AESMENU = menu_bar.o menu_ich.o menu_ien.o menu_tno.o menu_tex.o \
  511. !       menu_reg.o menu_pop.o menu_att.o menu_ist.o menu_set.o
  512.   
  513. + 
  514.   AESOBJ = objc_add.o objc_del.o objc_dra.o objc_fin.o objc_off.o \
  515.        objc_ord.o objc_edi.o objc_cha.o 
  516.   
  517. ***************
  518. *** 59,68 ****
  519.         vsc_expo.o v_meta_e.o v_write_.o vm_pages.o vm_coord.o \
  520.         vm_filen.o v_escape.o 
  521.   
  522. ! VDIFSM = vqt_fext.o v_ftext.o v_killou.o v_getout.o vst_scra.o vst_erro.o \
  523. !      v_shtext.o vst_arbp.o vqt_adva.o vqt_devi.o v_saveca.o \
  524. !      v_loadca.o v_flushc.o vst_sets.o vst_skew.o vqt_get_.o \
  525. !      vqt_cach.o v_getbit.o
  526.   
  527.   VDIGDP = v_bar.o    v_arc.o  v_piesli.o v_circle.o v_ellarc.o \
  528.        v_ellpie.o v_ellips.o v_rbox.o v_rfbox.o  v_justif.o 
  529. --- 60,70 ----
  530.         vsc_expo.o v_meta_e.o v_write_.o vm_pages.o vm_coord.o \
  531.         vm_filen.o v_escape.o 
  532.   
  533. ! VDIFSM = vqt_fext.o v_ftext.o v_fteof.o v_getout.o vst_scra.o vst_erro.o \
  534. !      v_shtext.o vst_arbp.o vst_ar32.o vqt_adva.o vqt_ad32.o vqt_devi.o \
  535. !      v_saveca.o v_loadca.o v_flushc.o vst_sets.o vst_se32.o vst_skew.o \
  536. !      vqt_get_.o vqt_cach.o vst_char.o vst_kern.o vqt_fnt.o vqt_trac.o \
  537. !      vqt_pair.o v_getbit.o
  538.   
  539.   VDIGDP = v_bar.o    v_arc.o  v_piesli.o v_circle.o v_ellarc.o \
  540.        v_ellpie.o v_ellips.o v_rbox.o v_rfbox.o  v_justif.o 
  541. ===================================================================
  542. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/vdibez.c,v
  543. retrieving revision 1.2
  544. diff -c -r1.2 vdibez.c
  545. *** 1.2    1992/04/19 16:47:42
  546. --- vdibez.c    1993/02/22 06:07:46
  547. ***************
  548. *** 10,15 ****
  549. --- 10,18 ----
  550.    *  set of symbols with compilers which need symbols unique in the
  551.    *  first seven characters.  Besides this resolution is required
  552.    *  by "The Standard" :-)
  553. +  *
  554. +  *  ++jrb sync up with SpeedoGDOS docs
  555. +  *
  556.    */
  557.   #include "common.h"
  558.   #ifndef _COMPILER_H
  559. ***************
  560. *** 39,47 ****
  561.    * Inform GDOS about  location and size of a buffer which  GDOS
  562.    * can use for creation of Bezier curves.
  563.    *    buf_p  is a pointer to an address of a buffer
  564. !  *    size   its a buffer size in 2-byte words (!!)
  565. !  *           or 16-bytes paragraphs - depends in which document
  566. !  *           you believe.
  567.    * If buf_p is NULL, then space for a buffer will be allocated
  568.    * by GDOS - using Malloc (who knows where to look for this space?)
  569.    *
  570. --- 42,49 ----
  571.    * Inform GDOS about  location and size of a buffer which  GDOS
  572.    * can use for creation of Bezier curves.
  573.    *    buf_p  is a pointer to an address of a buffer
  574. !  *    size   its a buffer size in 16-bytes paragraphs
  575. !  *
  576.    * If buf_p is NULL, then space for a buffer will be allocated
  577.    * by GDOS - using Malloc (who knows where to look for this space?)
  578.    *
  579. ***************
  580. *** 54,61 ****
  581.       
  582.       *wptr++ = (short) buf_p;           /* low word of an address */
  583.       *wptr++ = (short)((long)buf_p >> 16);  /* high word of an address */
  584. !     *wptr =   (short) size;               /* size of buffer in something */
  585. ! 
  586.        wptr = (short *)_contrl;
  587.       *wptr++ = -1;    /* 0  - opcode */
  588.       *wptr++ = 0;    /* 1 */
  589. --- 56,63 ----
  590.       
  591.       *wptr++ = (short) buf_p;           /* low word of an address */
  592.       *wptr++ = (short)((long)buf_p >> 16);  /* high word of an address */
  593. !     *wptr =   (short) size;               /* size of buffer in paragraphs */
  594. !                                            /* para == 16 bytes */
  595.        wptr = (short *)_contrl;
  596.       *wptr++ = -1;    /* 0  - opcode */
  597.       *wptr++ = 0;    /* 1 */
  598. ***************
  599. *** 93,100 ****
  600.   /*
  601.    * v_bez_on (alias v_bezon)
  602.    * Enable Bezier capabilities.
  603. !  * Find a number of segments per Bezier curve.
  604. !  * Returns logarithm in a base of 2 from that number
  605.    */
  606.   
  607.   __asm__(".stabs \"_v_bezon\",5,0,0,_v_bez_on"); /* dept of clean tricks */
  608. --- 95,105 ----
  609.   /*
  610.    * v_bez_on (alias v_bezon)
  611.    * Enable Bezier capabilities.
  612. !  * Returns maximum Bezier depth (a measure of smoothness). The return
  613. !  * value can range from 0-7, and is the exponent of 2, giving the
  614. !  * number of line segments that make up the curve. 
  615. !  * 0 == 2**0 == 1 == straight line and
  616. !  * 7 == 2**7 == 128 line segments.
  617.    */
  618.   
  619.   __asm__(".stabs \"_v_bezon\",5,0,0,_v_bez_on"); /* dept of clean tricks */
  620. ***************
  621. *** 101,107 ****
  622. --- 106,114 ----
  623.   int
  624.   v_bez_on (int handle)
  625.   {
  626. +     _contrl[4] = 4;    /* dont know why, but atari docs say so! */
  627.       __vdi__(VDI_CONTRL_ENCODE(11, 1, 0, 13), handle);
  628. +     _contrl[4] = 0;    /* clear it back */
  629.       return *_intout;
  630.   }
  631.   #endif /* L_v_bez_on */
  632. ***************
  633. *** 112,117 ****
  634. --- 119,125 ----
  635.    * v_bez_off (alias v_bezoff)
  636.    * Disable Bezier capabilities.
  637.    * Free space allocated by GDOS for Bezier curves.
  638. +  * (see v_set_app_buff for memory alloc info)
  639.    */
  640.   __asm__(".stabs \"_v_bezoff\",5,0,0,_v_bez_off"); /* dept of clean tricks */
  641.   void
  642. ***************
  643. *** 175,181 ****
  644. --- 183,197 ----
  645.       while (optr < end)
  646.           *optr++ = *xyarr++;
  647.   #endif
  648. + 
  649. +     _contrl[2] = 2; /* dont know why, the atari docs say so without */
  650. +     _contrl[4] = 6; /* any  explaination */
  651. + 
  652.       __vdi__(VDI_CONTRL_ENCODE(cntrl0, count, ((count + 1) >> 1), 13), handle);
  653. + 
  654. +     _contrl[2] = 0;
  655. +     _contrl[4] = 0;
  656. + 
  657.   #ifdef __MSHORT__
  658.       /* restore standard parameter block */ 
  659.       _vdiparams[2] = (void *) _ptsin;
  660. ***************
  661. *** 251,257 ****
  662. --- 267,280 ----
  663.       while (optr < end)
  664.           *optr++ = *xyarr++;
  665.   #endif
  666. +     _contrl[2] = 2; /* dont know why, the atari docs say so without */
  667. +     _contrl[4] = 6; /* any  explaination */
  668. + 
  669.       __vdi__(VDI_CONTRL_ENCODE(cntrl0, count, ((count + 1) >> 1), 13), handle);
  670. + 
  671. +     _contrl[2] = 0;
  672. +     _contrl[4] = 0;
  673. + 
  674.   #ifdef __MSHORT__
  675.       /* restore standard parameter block */ 
  676.       _vdiparams[2] = (void *) _ptsin;
  677. ***************
  678. *** 296,306 ****
  679.       *wptr++ = 0;    /* 1 */
  680.        wptr++;        /* 2 */
  681.       *wptr++ = 3;    /* 3  - # of entries in _intin */
  682. !      wptr++;        /* 4 */
  683.       *wptr++ = 99;    /* 5 - id */
  684.       *wptr   = handle;    /* 6 - handle */
  685.       vdi();        /* call vdi */
  686. ! 
  687.       return (*actual = *_intout);
  688.   }
  689.   #endif /* L_v_bez_qu */
  690. --- 319,330 ----
  691.       *wptr++ = 0;    /* 1 */
  692.        wptr++;        /* 2 */
  693.       *wptr++ = 3;    /* 3  - # of entries in _intin */
  694. !     *wptr++ = 1;    /* 4 - atari doesnt say why! */
  695.       *wptr++ = 99;    /* 5 - id */
  696.       *wptr   = handle;    /* 6 - handle */
  697.       vdi();        /* call vdi */
  698. !     _contrl[4] = 0;     /* clear it back */
  699. !     
  700.       return (*actual = *_intout);
  701.   }
  702.   #endif /* L_v_bez_qu */
  703. ===================================================================
  704. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/vdibind.h,v
  705. retrieving revision 1.12
  706. diff -c -r1.12 vdibind.h
  707. *** 1.12    1992/06/03 19:04:28
  708. --- vdibind.h    1993/02/22 06:07:47
  709. ***************
  710. *** 285,305 ****
  711.   __EXTERN unsigned long vq_gdos __PROTO((void));
  712.   #endif /* __GNUC__ | !__NO_INLINE__ */    
  713.   
  714. ! /* FSM gdos bindings */
  715.   
  716. ! /* ---------------------------------------------------------------------------
  717. !  * Retrieve placement information for FSM generated characters
  718. !  * Information is placed in infoarray of 52 ints.
  719. !  * Borrow a soothsayer from DRI or Atari to find its meaning.
  720. !  *
  721. !  * This is a temporary bindings since one genius decided
  722. !  * that some entries in infoarray will represent real numbers.
  723. !  * You may fully expect that that this representation of reals is
  724. !  * absolutely different from what your compiler is using.
  725. !  * Count your lucky stars if at least sizeof(double) == 2 * sizeof(int).
  726. !  * Or maybe sizeof(double) is supposed to be sizeof(float)?
  727. !  */
  728. ! __EXTERN void v_getbitmap_info __PROTO((int handle, int ch, int infoarray[]));
  729.   
  730.   /*
  731.    * Inquire text extent, accounting for FSM text placement
  732. --- 285,306 ----
  733.   __EXTERN unsigned long vq_gdos __PROTO((void));
  734.   #endif /* __GNUC__ | !__NO_INLINE__ */    
  735.   
  736. ! /* FSM/SpeedGDOS bindings */
  737.   
  738. ! /* Get Character Bitmap Information. This call provides information to allow
  739. !  * the caller to know the exact size and placement of a given character.  This
  740. !  * information includes the character's x and y advance vectors, the x and y
  741. !  * offsets, and the bitmap dimensions of the character. The advance vector
  742. !  * represents the amount to add to the current point to place the following
  743. !  * character.  The x and y offsets, when added to the current point, give the
  744. !  * caller the location of the upper left hand corner of the bitmap.  The width
  745. !  * and height of the bitmap are returned as 16 bit integers.  All other values
  746. !  * are returned in fix31 representation.
  747. !  */
  748. ! __EXTERN void v_getbitmap_info __PROTO((int handle, int ch,  long *advancex,
  749. ! long *advancey, long *xoffset, long *yoffset, int *width, int *height,
  750. ! short **bitmap));
  751. ! 
  752.   
  753.   /*
  754.    * Inquire text extent, accounting for FSM text placement
  755. ***************
  756. *** 307,325 ****
  757.   __EXTERN void vqt_f_extent __PROTO((int handle, const char *str, int extent[]));
  758.   
  759.   /*
  760. !  * Draw FSM text (accounts for fractional advances in rotated text)
  761.    */
  762.   __EXTERN void v_ftext __PROTO((int handle, int x, int y, const char *str));
  763. ! 
  764. ! /*
  765. !  * Release memory associated with outline component generated by v_getoutline()
  766. !  */
  767. ! __EXTERN void v_killoutline __PROTO((int handle, void *component));
  768.   
  769.   /*
  770.    * Generate an outline for character ch, and return the address of the outline.
  771.    */
  772. ! __EXTERN void v_getoutline __PROTO((int handle, int ch, void **component));
  773.   
  774.   /*
  775.    * Set scratch buffer allocation mode.
  776. --- 308,324 ----
  777.   __EXTERN void vqt_f_extent __PROTO((int handle, const char *str, int extent[]));
  778.   
  779.   /*
  780. !  * Draw outline font text (accounts for fractional advances in rotated text)
  781.    */
  782.   __EXTERN void v_ftext __PROTO((int handle, int x, int y, const char *str));
  783. ! __EXTERN void v_ftext_offset __PROTO((int handle, int x, int y,
  784. !                                       const char *str, int *offset)); 
  785.   
  786.   /*
  787.    * Generate an outline for character ch, and return the address of the outline.
  788.    */
  789. ! __EXTERN void v_getoutline __PROTO((int handle, int ch, int *xyarray,
  790. !                                  char *bezarray, int maxverts, int *numverts));
  791.   
  792.   /*
  793.    * Set scratch buffer allocation mode.
  794. ***************
  795. *** 347,358 ****
  796.    */
  797.   __EXTERN int    vst_arbpt __PROTO((  int handle, int point, int *wchar,
  798.                      int *hchar, int *wcell, int *hcell ));
  799.   
  800.   /*
  801. !  * Inquire FSM text advance placement vector.
  802.    */
  803.   __EXTERN void    vqt_advance __PROTO(( int handle, int ch, int *xadv,
  804.                        int *yadv, int *xrem, int *yrem)); 
  805.   
  806.   /*
  807.    * Inquire device status information.
  808. --- 346,361 ----
  809.    */
  810.   __EXTERN int    vst_arbpt __PROTO((  int handle, int point, int *wchar,
  811.                      int *hchar, int *wcell, int *hcell ));
  812. + __EXTERN long    vst_arbpt32 __PROTO((  int handle, long point, int *wchar,
  813. +                    int *hchar, int *wcell, int *hcell ));
  814.   
  815.   /*
  816. !  * Inquire outline font text advance placement vector.
  817.    */
  818.   __EXTERN void    vqt_advance __PROTO(( int handle, int ch, int *xadv,
  819.                        int *yadv, int *xrem, int *yrem)); 
  820. + __EXTERN void   vqt_advance32 __PROTO((int handle, int ch, long *advx,
  821. +                                        long *advy));
  822.   
  823.   /*
  824.    * Inquire device status information.
  825. ***************
  826. *** 380,385 ****
  827. --- 383,390 ----
  828.    */
  829.   __EXTERN int    vst_setsize __PROTO(( int handle, int point, int *wchar,
  830.                        int *hchar, int *wcell, int *hcell ));
  831. + __EXTERN long    vst_setsize32 __PROTO(( int handle, long point, int *wchar,
  832. +                      int *hchar, int *wcell, int *hcell ));
  833.   
  834.   /*
  835.    * Set FSM skew.
  836. ***************
  837. *** 389,402 ****
  838.   /*
  839.    * Get FSM GASCII tables.
  840.    */
  841.   __EXTERN void    vqt_get_tables __PROTO(( int handle, void **gascii,
  842.                       void **style ));
  843.   
  844.   /* 
  845. !  * Get FSM cashe size
  846.    */
  847.   __EXTERN void    vqt_cachesize __PROTO(( int handle, int which_cache,
  848.                          size_t *size ));
  849.   
  850.   /*
  851.    * bezier curves stuff
  852. --- 394,437 ----
  853.   /*
  854.    * Get FSM GASCII tables.
  855.    */
  856. + __EXTERN void   vqt_get_table __PROTO((int handle, short **map));
  857. + #if 0 /* old FSMgdos binding */
  858.   __EXTERN void    vqt_get_tables __PROTO(( int handle, void **gascii,
  859.                       void **style ));
  860. + #endif
  861.   
  862.   /* 
  863. !  * Get FSM cache size
  864.    */
  865.   __EXTERN void    vqt_cachesize __PROTO(( int handle, int which_cache,
  866.                          size_t *size ));
  867. + /*
  868. +  * Set Character Mapping Mode
  869. +  */
  870. + __EXTERN void vst_charmap __PROTO((int handle, int mode));
  871. + 
  872. + /*
  873. +  * Set Kerning Mode
  874. +  */
  875. + __EXTERN void vst_kern __PROTO((int handle, int tmode, int pmode, int *tracks,
  876. +                                 int *pairs));
  877. + 
  878. + /*
  879. +  * Inq Speedo Header
  880. +  */
  881. + __EXTERN void vqt_fontheader __PROTO((int handle, char *buffer, char
  882. +                                       *pathname));
  883. + 
  884. + /*
  885. +  * Inq track kerning info
  886. +  */
  887. + __EXTERN void vqt_trackkern __PROTO((int handle, long *x, long *y));
  888. + 
  889. + /*
  890. +  * Inq pair kerning info
  891. +  */
  892. + __EXTERN void vqt_pairkern __PROTO((int handle, int ch1, int ch2, long *x, long
  893. +                                     *y));
  894.   
  895.   /*
  896.    * bezier curves stuff
  897. ===================================================================
  898. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/vdifsm.c,v
  899. retrieving revision 1.5
  900. diff -c -r1.5 vdifsm.c
  901. *** 1.5    1992/01/14 19:33:03
  902. --- vdifsm.c    1993/02/22 06:07:49
  903. ***************
  904. *** 1,8 ****
  905.   /*
  906. !  * FSM gdos bindings
  907.    * this file has some relationship to a file supplied by Atari
  908.    * but it changed quite a bit (among other things it appears to work).
  909.    * v_shtext survived verbatim from the original.
  910.    */
  911.   
  912.   #include "common.h"
  913. --- 1,13 ----
  914.   /*
  915. !  * FSM/SpeedoGDOS  gdos bindings
  916.    * this file has some relationship to a file supplied by Atari
  917.    * but it changed quite a bit (among other things it appears to work).
  918.    * v_shtext survived verbatim from the original.
  919. +  *
  920. +  * ++jrb add more speedoGDOS stuff. now it looks nothing like the one
  921. +  *       from atari. i guess this file should now be called vdispeedo or
  922. +  *       something like that. btw: atari claims that the api did'nt change
  923. +  *       yeah right!
  924.    */
  925.   
  926.   #include "common.h"
  927. ***************
  928. *** 11,105 ****
  929.   #endif
  930.   #include <types.h>
  931.   
  932. - /* FSMBIND functions
  933. -  * ======================================================================
  934. -  */
  935. - 
  936.   #ifdef __DEF_ALL__
  937.   
  938. - #define L_v_getbit
  939.   #define L_vqt_fext
  940.   #define L_v_ftext
  941. ! #define L_v_killou
  942.   #define L_v_getout
  943.   #define L_vst_scra
  944.   #define L_vst_erro
  945.   #define L_v_shtext
  946.   #define L_vst_arbp
  947.   #define L_vqt_adva
  948.   #define L_vqt_devi
  949.   #define L_v_saveca
  950.   #define L_v_loadca
  951.   #define L_v_flushc
  952.   #define L_vst_sets
  953.   #define L_vst_skew
  954.   #define L_vqt_get_
  955.   #define L_vqt_cach
  956.   
  957.   #endif /* __DEF_ALL__ */
  958.   
  959. - #ifdef L_v_getbit
  960. - 
  961. - /* ---------------------------------------------------------------------------
  962. -  * Retrieve placement information for FSM generated characters
  963. -  * Information is placed in infoarray of 52 ints.
  964. -  * Borrow a soothsayer from DRI or Atari to find its meaning.
  965. -  *
  966. -  * This is a temporary bindings since one genius decided
  967. -  * that some entries in infoarray will represent real numbers.
  968. -  * You may fully expect that that this representation of reals is
  969. -  * absolutely different from what your compiler is using.
  970. -  * Count your lucky stars if at least sizeof(double) == 2 * sizeof(int).
  971. -  * Or maybe sizeof(double) is supposed to be sizeof(float)?
  972. -  */
  973. - void
  974. - v_getbitmap_info(int handle, int ch, int infoarray[52])
  975. - {
  976. -     short *ptr = _intin;
  977. - 
  978. -     *ptr++ = ch;
  979. -     *(int **)ptr = &infoarray[0];
  980. - 
  981. -     __vdi__(VDI_CONTRL_ENCODE(239, 0, 3, 0), handle);
  982. - 
  983. - #ifndef __MSHORT__
  984. -     /* Repack returned information from an array of shorts into an
  985. -        array of ints */
  986. -     { /* dummy block to contain new declarations */
  987. -     short *s_ptr = (short *)(&infoarray[0]) + 52;
  988. -     short *bot   = (short *)(&infoarray[0]) +  4;
  989. -     int   *i_ptr = (&infoarray[0]) + 52;
  990. - 
  991. -     do {
  992. -         s_ptr -= 2;              /* copy y-offset */
  993. -         *(--i_ptr) = *(int *)s_ptr;
  994. -         *(--i_ptr) = 0;
  995. -     
  996. -         s_ptr -= 2;              /* copy x-offset */
  997. -         *(--i_ptr) = *(int *)s_ptr;
  998. -         *(--i_ptr) = 0;
  999. -         
  1000. -         *(--i_ptr) = *(--s_ptr);  /* bitmap height */
  1001. -         *(--i_ptr) = *(--s_ptr);  /* bitmap width  */
  1002. -     } while (s_ptr > bot);
  1003. - 
  1004. -     *(--i_ptr) = *(--s_ptr);      /* remainder y-advance */
  1005. -     *(--i_ptr) = *(--s_ptr);      /* y-advance */
  1006. -     *(--i_ptr) = *(--s_ptr);      /* remainder x-advance */
  1007. -     *i_ptr     = *s_ptr;          /* x-advance */
  1008. -     }
  1009. - #endif /* __MSHORT__ */
  1010. - }
  1011. - 
  1012. - #endif /* L_v_getbit */
  1013. - 
  1014.   #ifdef L_vqt_fext
  1015.   
  1016. ! /* ---------------------------------------------------------------------------
  1017. !  * Inquire text extent, accounting for FSM text placement
  1018.    */
  1019. ! void
  1020. ! vqt_f_extent(int handle, const char *str, int extent[8])
  1021.   {
  1022.       unsigned char ch;
  1023.       short *ptr;
  1024. --- 16,59 ----
  1025.   #endif
  1026.   #include <types.h>
  1027.   
  1028.   #ifdef __DEF_ALL__
  1029.   
  1030.   #define L_vqt_fext
  1031.   #define L_v_ftext
  1032. ! #define L_v_fteof
  1033.   #define L_v_getout
  1034.   #define L_vst_scra
  1035.   #define L_vst_erro
  1036.   #define L_v_shtext
  1037.   #define L_vst_arbp
  1038. + #define L_vst_ar32
  1039.   #define L_vqt_adva
  1040. + #define L_vqt_ad32
  1041.   #define L_vqt_devi
  1042.   #define L_v_saveca
  1043.   #define L_v_loadca
  1044.   #define L_v_flushc
  1045.   #define L_vst_sets
  1046. + #define L_vst_se32
  1047.   #define L_vst_skew
  1048.   #define L_vqt_get_
  1049.   #define L_vqt_cach
  1050. + #define L_vst_char
  1051. + #define L_vst_kern
  1052. + #define L_vqt_fnt
  1053. + #define L_vqt_trac
  1054. + #define L_vqt_pair
  1055. + #define L_v_getbit
  1056.   
  1057.   #endif /* __DEF_ALL__ */
  1058.   
  1059.   #ifdef L_vqt_fext
  1060.   
  1061. ! /* Inquire Outline Font Text Extent. This function works exactly like
  1062. !  * vqt_extent(), but the rectangle returned will account for the remainder
  1063. !  * values of vqt_advance() and kerning.
  1064.    */
  1065. ! void vqt_f_extent(int handle, const char *str, int extent[8])
  1066.   {
  1067.       unsigned char ch;
  1068.       short *ptr;
  1069. ***************
  1070. *** 124,131 ****
  1071.   
  1072.   #ifdef L_v_ftext
  1073.   
  1074. ! /* ---------------------------------------------------------------------------
  1075. !  * Draw FSM text (accounts for fractional advances in rotated text)
  1076.    */
  1077.   void
  1078.   v_ftext(int handle, int x, int y, const char *str)
  1079. --- 78,92 ----
  1080.   
  1081.   #ifdef L_v_ftext
  1082.   
  1083. ! /* Outline Font Text. This function works exactly like v_gtext(), but the text
  1084. !  * returned will account for the remainder values of vqt_advance().  In other
  1085. !  * words, the text spacing will be more accurate. In addition, for applications
  1086. !  * that want more control over character placement, v_ftext() will take a
  1087. !  * custom set of offset vectors, one for each character in the string
  1088. !  * (including the last one for underlining calculations).  Each vector must  
  1089. !  * consist of a pair of 16-bit values that will be used in place of a
  1090. !  * character's advance vector when outputting text.  A second binding follows
  1091. !  * the original. 
  1092.    */
  1093.   void
  1094.   v_ftext(int handle, int x, int y, const char *str)
  1095. ***************
  1096. *** 144,173 ****
  1097.   
  1098.   #endif /* L_v_ftext */
  1099.   
  1100. ! 
  1101. ! #ifdef L_v_killou
  1102. ! /* ---------------------------------------------------------------------------
  1103. !  * Release memory associated with outline component generated by v_getoutline()
  1104. !  */
  1105. ! void
  1106. ! v_killoutline(int handle, void *component)
  1107.   {
  1108. !     *(void **)&_intin[0] =  component;
  1109. !     __vdi__(VDI_CONTRL_ENCODE(242, 0, 2, 0), handle);
  1110.   }
  1111.   #endif /* L_v_killou */
  1112.   
  1113.   
  1114.   #ifdef L_v_getout
  1115. ! /* ---------------------------------------------------------------------------
  1116. !  * Generate an outline for character ch, and return the address of the outline.
  1117.    */
  1118. ! void
  1119. ! v_getoutline(int handle, int ch, void **component)
  1120.   {
  1121.       _intin[0] = ch;
  1122. !     *(void ***)&_intin[1] = component;
  1123. !     __vdi__(VDI_CONTRL_ENCODE(243, 0, 3, 0), handle);
  1124.   }
  1125.   
  1126.   #endif /* L_v_getout */
  1127. --- 105,160 ----
  1128.   
  1129.   #endif /* L_v_ftext */
  1130.   
  1131. ! #ifdef L_v_fteof
  1132. ! void v_ftext_offset(int handle, int x, int y, const char *str, int *offset)
  1133.   {
  1134. !     unsigned char   ch;
  1135. !     short *ptr = _intin;
  1136. !     int n = 0;
  1137. !     
  1138. !     _ptsin[0] = x;
  1139. !     _ptsin[1] = y;
  1140. !     while ( ch  = (unsigned const char) *str++) 
  1141. !     {
  1142. !     *ptr++ = ch;
  1143. !         n++;
  1144. !     }
  1145. !     *ptr = 0;
  1146. ! 
  1147. !     ptr = &_ptsin[2];
  1148. !     for(n *= 2; n > 0; n--)
  1149. !     {
  1150. !         *ptr++ = *offset++;
  1151. !     }
  1152. !     
  1153. !     __vdi__(VDI_CONTRL_ENCODE(241, 1, (int)(ptr - _intin), 0), handle);
  1154.   }
  1155. + #endif /* L_v_fteof */
  1156. + 
  1157. + #ifdef  L_v_killou
  1158. + 
  1159. + #error v_killoutline(int handle, void *component) doesnt exist any more
  1160. + 
  1161.   #endif /* L_v_killou */
  1162.   
  1163.   
  1164.   #ifdef L_v_getout
  1165. ! 
  1166. ! /* Generate an outline for character ch, and return the bezier representation
  1167. !  * in the buffer provided.
  1168.    */
  1169. ! void v_getoutline(int handle, int ch, int *xyarray, char *bezarray,
  1170. !                   int maxverts, int *numverts)
  1171.   {
  1172. +     int **addr;
  1173. +     
  1174.       _intin[0] = ch;
  1175. !     _intin[1] = maxverts;
  1176. !     addr = (int **)(&_intin[2]);
  1177. !     *addr++ = xyarray;
  1178. !     *addr = (int *)bezarray;
  1179. !     __vdi__(VDI_CONTRL_ENCODE(243, 0, 6, 0), handle);
  1180. !     *numverts = _intout[0];
  1181.   }
  1182.   
  1183.   #endif /* L_v_getout */
  1184. ***************
  1185. *** 174,188 ****
  1186.   
  1187.   
  1188.   #ifdef L_vst_scra
  1189. ! /* ---------------------------------------------------------------------------
  1190. !  * Set scratch buffer allocation mode.
  1191.    * This buffes is used when creating special effects on fonts.
  1192.    * mode=0: (default) account for FSM fonts when allocating scratch buffers
  1193.    * mode=1: account only for BM fonts;  no special effects for outlines
  1194.    * mode=2: allocate no scratch buffer; no special effects at all
  1195.    */
  1196. ! void
  1197. ! vst_scratch(int handle, int mode)
  1198.   {
  1199.       _intin[0] = mode;
  1200.       __vdi__(VDI_CONTRL_ENCODE(244, 0, 1, 0), handle);
  1201. --- 161,174 ----
  1202.   
  1203.   
  1204.   #ifdef L_vst_scra
  1205. ! 
  1206. ! /* Set scratch buffer allocation mode.
  1207.    * This buffes is used when creating special effects on fonts.
  1208.    * mode=0: (default) account for FSM fonts when allocating scratch buffers
  1209.    * mode=1: account only for BM fonts;  no special effects for outlines
  1210.    * mode=2: allocate no scratch buffer; no special effects at all
  1211.    */
  1212. ! void vst_scratch(int handle, int mode)
  1213.   {
  1214.       _intin[0] = mode;
  1215.       __vdi__(VDI_CONTRL_ENCODE(244, 0, 1, 0), handle);
  1216. ***************
  1217. *** 193,209 ****
  1218.   
  1219.   #ifdef L_vst_erro
  1220.   
  1221. ! /* ---------------------------------------------------------------------------
  1222. !  * Set FSM error mode.
  1223.    * mode=1: (default) errors go to screen.
  1224.    * mode=0: errors reported in error variable `errorvar'.
  1225.    */
  1226. ! void
  1227. ! vst_error(int handle, int mode, int *errorvar)
  1228.   {
  1229.       _intin[0] = mode;
  1230. !     *(int **)&_intin[1] = errorvar;
  1231.       __vdi__(VDI_CONTRL_ENCODE(245, 0, 3, 0), handle);
  1232.   }
  1233.   
  1234.   #endif /* L_vst_erro */
  1235. --- 179,196 ----
  1236.   
  1237.   #ifdef L_vst_erro
  1238.   
  1239. ! /* Set FSM error mode.
  1240.    * mode=1: (default) errors go to screen.
  1241.    * mode=0: errors reported in error variable `errorvar'.
  1242.    */
  1243. ! void vst_error(int handle, int mode, int *errorvar)
  1244.   {
  1245. +     short errv;
  1246. +     
  1247.       _intin[0] = mode;
  1248. !     *(short **)&_intin[1] = &errv;
  1249.       __vdi__(VDI_CONTRL_ENCODE(245, 0, 3, 0), handle);
  1250. +     *errorvar = errv;
  1251.   }
  1252.   
  1253.   #endif /* L_vst_erro */
  1254. ***************
  1255. *** 211,224 ****
  1256.   
  1257.   #ifdef L_v_shtext
  1258.   
  1259. ! /* ----------------------------------------------------------------------
  1260. !  * v_gtext with shadow.
  1261.    * Text color should be set to `color' before calling.
  1262.    * This is not technically an FSM binding,
  1263.    * but this module is a convenient place for it.
  1264.    */
  1265. ! void
  1266. ! v_shtext( int wsid, 
  1267.         int x,
  1268.         int y,
  1269.         const char * text,
  1270. --- 198,209 ----
  1271.   
  1272.   #ifdef L_v_shtext
  1273.   
  1274. ! /* v_gtext with shadow.
  1275.    * Text color should be set to `color' before calling.
  1276.    * This is not technically an FSM binding,
  1277.    * but this module is a convenient place for it.
  1278.    */
  1279. ! void v_shtext( int wsid, 
  1280.         int x,
  1281.         int y,
  1282.         const char * text,
  1283. ***************
  1284. *** 243,256 ****
  1285.   
  1286.   #ifdef L_vst_arbp
  1287.   
  1288. ! /* ----------------------------------------------------------------------
  1289. !  * Set character cell height to arbitrary value.
  1290.    * Height is given in printer points (more or less) and it does not
  1291.    * have to be listed in extend.sys.
  1292.    * Only for FSM outline fonts.
  1293.    */
  1294. ! int
  1295. ! vst_arbpt( int handle,
  1296.          int point,
  1297.          int *wchar,
  1298.          int *hchar,
  1299. --- 228,239 ----
  1300.   
  1301.   #ifdef L_vst_arbp
  1302.   
  1303. ! /* Set character cell height to arbitrary value.
  1304.    * Height is given in printer points (more or less) and it does not
  1305.    * have to be listed in extend.sys.
  1306.    * Only for FSM outline fonts.
  1307.    */
  1308. ! int vst_arbpt( int handle,
  1309.          int point,
  1310.          int *wchar,
  1311.          int *hchar,
  1312. ***************
  1313. *** 270,283 ****
  1314.   }
  1315.   #endif /* L_vst_arbp */
  1316.   
  1317.   #ifdef L_vqt_adva
  1318.   
  1319. ! /* ----------------------------------------------------------------------
  1320. !  * Inquire FSM text advance placement vector.
  1321. !  * Remainders xrem and yrem are modulo 16384 (2^14, 1 << 14)
  1322.    */
  1323. ! void
  1324. ! vqt_advance( int handle, int ch, int *xadv, int *yadv, int *xrem, int *yrem)
  1325.   {
  1326.       short    *outp = &_ptsout[0];
  1327.   
  1328. --- 253,297 ----
  1329.   }
  1330.   #endif /* L_vst_arbp */
  1331.   
  1332. + #ifdef L_vst_ar32
  1333. + 
  1334. + /* fix32 version */
  1335. + long vst_arbpt32( int handle,
  1336. +        long point,
  1337. +        int *wchar,
  1338. +        int *hchar,
  1339. +        int *wcell,
  1340. +        int *hcell )
  1341. + {
  1342. +     short    *outp = &_ptsout[0];
  1343. + 
  1344. +     *((long *)(&_intin[0])) = point;
  1345. +     __vdi__(VDI_CONTRL_ENCODE(246, 0, 2, 0), handle);
  1346. +     *wchar = *outp++;
  1347. +     *hchar = *outp++;
  1348. +     *wcell = *outp++;
  1349. +     *hcell = *outp;
  1350. + 
  1351. +     return *((long *)(&_intout[0]));
  1352. + }
  1353. + #endif /* L_vst_ar32 */
  1354. + 
  1355.   #ifdef L_vqt_adva
  1356.   
  1357. ! /* Inquire Outline Font Text Advance Placement Vector
  1358. !  * This function returns the x and y offsets which are needed to  place the
  1359. !  * next character of a string in the proper position.  This call is necessary
  1360. !  * when laying down text at rotations other than 0, 90,  and 270.  In addition,
  1361. !  * the call returns remainder values for the x and y offsets (mod 16000), so
  1362. !  * that cursor placement can be calculated for v_ftext() and vqt_f_extent().
  1363. !  *
  1364. !  * In addition, this call also returns values in units of 1/65536 pixels (fix31
  1365. !  * format).  The new binding for vqt_advance32() follows, and atari encourages
  1366. !  * programmers to use the new data type.
  1367. !  *
  1368.    */
  1369. ! void vqt_advance(int handle, int ch, int *xadv, int *yadv, int *xrem,
  1370. !                  int *yrem) 
  1371.   {
  1372.       short    *outp = &_ptsout[0];
  1373.   
  1374. ***************
  1375. *** 290,306 ****
  1376.   }
  1377.   #endif /* L_vqt_adva */
  1378.   
  1379.   #ifdef L_vqt_devi
  1380.   
  1381. ! /* ----------------------------------------------------------------------
  1382. !  * Inquire device status information.
  1383. !  * 
  1384. !  * Watch out!  Name is returned as a COUNTED string in 8+3 format,
  1385. !  * without separator, all in an upper case.  Missing character
  1386. !  * positions are filled with blanks.
  1387. !  * (At least this was the case for some versions of FSMGDOS.
  1388. !  * Who knows what will happen next.  This is NOT documented.
  1389. !  * Check before you jump!)
  1390.    */
  1391.   void
  1392.   vqt_devinfo( int handle, int device, int *isdev, char *drivername )
  1393. --- 304,330 ----
  1394.   }
  1395.   #endif /* L_vqt_adva */
  1396.   
  1397. + #ifdef L_vqt_ad32
  1398. + /* new binding. returns results in fix31 (1/64k pixels) types.
  1399. +  */
  1400. + void vqt_advance32(int handle, int ch, long *advx, long *advy)
  1401. + {
  1402. +     long *outp = (long *)(&_ptsout[4]);
  1403. + 
  1404. +     _intin[0] = ch;
  1405. +     __vdi__(VDI_CONTRL_ENCODE(247, 0, 1, 0), handle);
  1406. +     *advx = *outp++;
  1407. +     *advy = *outp;
  1408. + }
  1409. + #endif /* L_vqt_ad32 */
  1410. + 
  1411.   #ifdef L_vqt_devi
  1412.   
  1413. ! /* Inquire device status information.
  1414. !  * This function takes a device id number as a parameter and reports back to
  1415. !  * the application whether or not the driver for that device has been installed
  1416. !  * by gdos. If the driver has been installed, the name of the driver is
  1417. !  * returned to the application.
  1418.    */
  1419.   void
  1420.   vqt_devinfo( int handle, int device, int *isdev, char *drivername )
  1421. ***************
  1422. *** 322,329 ****
  1423.   
  1424.   #ifdef L_v_saveca
  1425.   
  1426. ! /* ----------------------------------------------------------------------
  1427. !  * Save FSM cache to disk.
  1428.    */
  1429.   int
  1430.   v_savecache( int handle, char *filename )
  1431. --- 346,352 ----
  1432.   
  1433.   #ifdef L_v_saveca
  1434.   
  1435. ! /* Save outline font cache to disk.
  1436.    */
  1437.   int
  1438.   v_savecache( int handle, char *filename )
  1439. ***************
  1440. *** 340,347 ****
  1441.   
  1442.   #ifdef L_v_loadca
  1443.   
  1444. ! /* ----------------------------------------------------------------------
  1445. !  * Load/merge FSM cache from disk.
  1446.    */
  1447.   int
  1448.   v_loadcache( int handle, char *filename, int mode )
  1449. --- 363,372 ----
  1450.   
  1451.   #ifdef L_v_loadca
  1452.   
  1453. ! /* Load/merge outline font cache from disk.
  1454. !  * mode = 0 - append
  1455. !  *      = 1 - flush and load anew
  1456. !  * returns 0 or -1 if error
  1457.    */
  1458.   int
  1459.   v_loadcache( int handle, char *filename, int mode )
  1460. ***************
  1461. *** 359,369 ****
  1462.   
  1463.   #ifdef L_v_flushc
  1464.   
  1465. ! /* ----------------------------------------------------------------------
  1466. !  * Flush FSM cache.
  1467.    */
  1468. ! int
  1469. ! v_flushcache( int handle )
  1470.   {
  1471.       __vdi__(VDI_CONTRL_ENCODE(251, 0, 0, 0), handle);
  1472.   
  1473. --- 384,393 ----
  1474.   
  1475.   #ifdef L_v_flushc
  1476.   
  1477. ! /* Flush outline font cache.
  1478. !  * return 0 or -1 on error.
  1479.    */
  1480. ! int v_flushcache( int handle )
  1481.   {
  1482.       __vdi__(VDI_CONTRL_ENCODE(251, 0, 0, 0), handle);
  1483.   
  1484. ***************
  1485. *** 373,386 ****
  1486.   
  1487.   #ifdef L_vst_sets
  1488.   
  1489. ! /* ----------------------------------------------------------------------
  1490. !  * Set character cell width (set size) to arbitrary value.
  1491. !  * Width is given in printer points (more or less).
  1492. !  * Only for FSM outline fonts.
  1493. !  * Effects are cancelled by calls to vst_point, vst_arbpt or vst_height.
  1494.    */
  1495. ! int
  1496. ! vst_setsize( int handle,
  1497.            int point,
  1498.            int *wchar,
  1499.            int *hchar,
  1500. --- 397,412 ----
  1501.   
  1502.   #ifdef L_vst_sets
  1503.   
  1504. ! /* Set Character Cell Width by Arbitrary Points. This function sets the current
  1505. !  * graphic text character width (set size) in printer points.  An arbitrary set
  1506. !  * size may be entered to represent the character width.  It should be noted
  1507. !  * that the next call to vst_point, vst_arbpt or vst_height will cancel out
  1508. !  * this call and  will set the set size to be equal to the requested point
  1509. !  * size. This call will only work with outline fonts.  The set size may be
  1510. !  * specified in either 16-bit integer format or 32-bit fix31 format (units of
  1511. !  * 1/65536 points). 
  1512.    */
  1513. ! int vst_setsize( int handle,
  1514.            int point,
  1515.            int *wchar,
  1516.            int *hchar,
  1517. ***************
  1518. *** 401,414 ****
  1519.   }
  1520.   #endif /* L_vst_sets */
  1521.   
  1522.   #ifdef L_vst_skew
  1523.   
  1524. ! /* ----------------------------------------------------------------------
  1525. !  * Set FSM skew.
  1526. !  * Skew in tenths of degrees.  Valid values between -900 and 900.
  1527.    */
  1528. ! int
  1529. ! vst_skew( int handle, int skew )
  1530.   {
  1531.       _intin[0] = skew;
  1532.       __vdi__(VDI_CONTRL_ENCODE(253, 0, 1, 0), handle);
  1533. --- 427,464 ----
  1534.   }
  1535.   #endif /* L_vst_sets */
  1536.   
  1537. + #ifdef L_vst_se32
  1538. + 
  1539. + /* new fix31 version
  1540. +  */
  1541. + 
  1542. + long vst_setsize32( int handle,
  1543. +          long point,
  1544. +          int *wchar,
  1545. +          int *hchar,
  1546. +          int *wcell,
  1547. +          int *hcell )
  1548. + {
  1549. +     short *outp = &_ptsout[0];
  1550. +     
  1551. +     *((long *)(&_intin[0])) = point;
  1552. +     __vdi__(VDI_CONTRL_ENCODE(252, 0, 2, 0), handle);
  1553. + 
  1554. +     *wchar = *outp++;
  1555. +     *hchar = *outp++;
  1556. +     *wcell = *outp++;
  1557. +     *hcell = *outp;
  1558. + 
  1559. +     return *((long *)(&_intout[0]));
  1560. + }
  1561. + #endif /* L_vst_se32 */
  1562. + 
  1563.   #ifdef L_vst_skew
  1564.   
  1565. ! /* Set FSM skew. (only works with outline fonts)
  1566. !  * Skew in tenths of degrees.  Valid values between -900 and 900. (-ve to left)
  1567.    */
  1568. ! int vst_skew( int handle, int skew )
  1569.   {
  1570.       _intin[0] = skew;
  1571.       __vdi__(VDI_CONTRL_ENCODE(253, 0, 1, 0), handle);
  1572. ***************
  1573. *** 419,424 ****
  1574. --- 469,499 ----
  1575.   
  1576.   #ifdef L_vqt_get_
  1577.   
  1578. + /* Get Character Mapping Table. This call returns the address of a series of
  1579. +  * contiguous tables used internally by  SpeedoGDOS.  The tables are used to
  1580. +  * map the Atari character set to the equivalent Bitstream character indexes.
  1581. +  * Depending on the font file, a Speedo font's indexes have six different
  1582. +  * formats: the Bitstream International Character Set, the Bitstream
  1583. +  * International Symbol Set, the Bitstream Dingbats Set, the PostScript text
  1584. +  * set, the PostScript symbol set, and the PostScript Dingbats set.  There are
  1585. +  * a total of seven tables which map the Atari character set to Bitstream
  1586. +  * character indexes, one master mapping, and one table for each of the
  1587. +  * aforementioned character sets (in the order presented).  Applications can
  1588. +  * find out which character set corresponds to the current font by checking the
  1589. +  * Speedo font file header. Each individual table contains 224  word-sized
  1590. +  * entries with the first entry being the translation for character 32, the
  1591. +  * second for character 33....etc.  Therefore, with the address of the table,
  1592. +  * applications can change the mappings so that any Bitstream character index
  1593. +  * may be substituted.
  1594. +  */
  1595. + void vqt_get_table(int handle, short **map)
  1596. + {
  1597. +     __vdi__(VDI_CONTRL_ENCODE(254, 0, 0, 0), handle);
  1598. + 
  1599. +     *map = *((short **)(&_intout[0]));
  1600. + }
  1601. + 
  1602. + #if 0 /* old fsm binding */
  1603.   /* ----------------------------------------------------------------------
  1604.    * Get FSM GASCII tables.
  1605.    */
  1606. ***************
  1607. *** 429,448 ****
  1608.       *gascii = *(void **)&_intout[0];
  1609.       *style =  *(void **)&_intout[2];
  1610.   }
  1611.   #endif /* L_vqt_get_ */
  1612.   
  1613.   #ifdef L_vqt_cach
  1614.   
  1615. ! /* ----------------------------------------------------------------------
  1616. !  * Get FSM cashe size
  1617.    */
  1618. ! void
  1619. ! vqt_cachesize( int handle, int which_cache, size_t *size )
  1620.   {
  1621.       _intin[0] = which_cache;
  1622.       __vdi__(VDI_CONTRL_ENCODE(255, 0, 1, 0), handle);
  1623. !     *size = *(size_t *)&_intout[0];
  1624.   }
  1625.   #endif /* L_vqt_cach */
  1626.   
  1627.   /* -eof- */
  1628. --- 504,649 ----
  1629.       *gascii = *(void **)&_intout[0];
  1630.       *style =  *(void **)&_intout[2];
  1631.   }
  1632. + #endif
  1633.   #endif /* L_vqt_get_ */
  1634.   
  1635.   #ifdef L_vqt_cach
  1636.   
  1637. ! /* Get Outline Font Cache Size. Returns the largest block size available in
  1638. !  * each of the two fsm caches.  This call can be used to estimate how big a
  1639. !  * character SpeedoGDOS can handle when it prints a character.  A zero (0) in
  1640. !  * which_cache will instruct SpeedoGDOS to return the largest allocatable block
  1641. !  * in the character bitmap cache.  A one (1) will return the same information
  1642. !  * for the data structure cache.
  1643.    */
  1644. ! void vqt_cachesize( int handle, int which_cache, size_t *size )
  1645.   {
  1646.       _intin[0] = which_cache;
  1647.       __vdi__(VDI_CONTRL_ENCODE(255, 0, 1, 0), handle);
  1648. !     *size = *((size_t *)(&_intout[0]));
  1649.   }
  1650.   #endif /* L_vqt_cach */
  1651. + 
  1652. + 
  1653. + #ifdef L_vst_char
  1654. + 
  1655. + /* Set Character Mapping Mode. This function allows the application to switch
  1656. +  * from using the Atari character set to the BICS character set.  The
  1657. +  * vst_charmap() function will set a flag so that all subsequent calls to text
  1658. +  * calls will use words that are equivalent to Bitstream character indexes
  1659. +  * instead of Atari ASCII bytes. 
  1660. +  */
  1661. + void vst_charmap(int handle, int mode)
  1662. + {
  1663. +     _intin[0] = mode;
  1664. +     __vdi__(VDI_CONTRL_ENCODE(236, 0, 1, 0), handle);
  1665. + }    
  1666. + #endif /* L_vst_char */
  1667. + 
  1668. + #ifdef L_vst_kern
  1669. + 
  1670. + /* Set Kerning Mode. This function allows the application to set the different
  1671. +  * kerning modes.  Track kerning can have 0-3 tracks:  0 is no kerning, 1 is
  1672. +  * normal, 2 is tight, and 3 is very tight.  The vst_kern() function passes in
  1673. +  * a track kern value and it returns the track to which the current font is
  1674. +  * set.  Pair kerning is set to be on or off. The vst_kern() function will
  1675. +  * return 0 if there is no track kerning or a number greater than 0 to indicate
  1676. +  * that pair kerning is on; that number is the number of kerning pairs in the
  1677. +  * font. 
  1678. +  */
  1679. + void vst_kern(int handle, int tmode, int pmode, int *tracks, int *pairs)
  1680. + {
  1681. +     _intin[0] = tmode;
  1682. +     _intin[1] = pmode;
  1683. +     __vdi__(VDI_CONTRL_ENCODE(237, 0, 2, 0), handle);
  1684. +     *tracks = _intout[0];
  1685. +     *pairs  = _intout[1];
  1686. + }    
  1687. + #endif /* L_vst_kern */
  1688. + 
  1689. + #ifdef L_vqt_fnt
  1690. + 
  1691. + /* Inquire Speedo Font Header Information. This function copies the current 
  1692. +  * font's Speedo font header into a buffer and returns the full path name for
  1693. +  * the corresponding TDF file.  Note that the buffer must be at least 421
  1694. +  * bytes.  See (nonexistant!) Bitstream documentation for specific font header
  1695. +  * information.  
  1696. +  */
  1697. + void vqt_fontheader(int handle, char *buffer, char *pathname)
  1698. + {
  1699. +     short *ptr;
  1700. +     int n;
  1701. +     
  1702. +     *((char **)(&_intin[0])) = buffer;
  1703. +     __vdi__(VDI_CONTRL_ENCODE(232, 0, 2, 0), handle);
  1704. +     
  1705. +     for(ptr = &_intout[0], n = _contrl[4]; n > 0; n--)
  1706. +         *pathname++ = *ptr++;
  1707. + }    
  1708. + #endif /* L_vqt_fnt */
  1709. + 
  1710. + #ifdef L_vqt_trac
  1711. + 
  1712. + /* Inquire Track Kerning Information. This function allows the application to
  1713. +  * inquire the adjustment vector for track kerning.  The vqt_trackkern()
  1714. +  * function returns the vector (x-direction and  y-direction) that indicates
  1715. +  * the spacing adjustment made between characters. 
  1716. +  */
  1717. + void vqt_trackkern(int handle, long *x, long *y)
  1718. + {
  1719. +     __vdi__(VDI_CONTRL_ENCODE(234, 0, 0, 0), handle);
  1720. +     *x = *((long *)(&_ptsout[0]));
  1721. +     *y = *((long *)(&_ptsout[2]));
  1722. + }
  1723. + #endif /* L_vqt_trac */
  1724. + 
  1725. + #ifdef L_vqt_pair
  1726. + 
  1727. + /* Inquire Pair Kerning Information. This function allows the application to
  1728. +  * inquire the adjustment vector for pair kerning.  The vqt_pairkern() function
  1729. +  * returns the vector (x-direction and y-direction) that indicates the spacing
  1730. +  * adjustment made between the character pair specified.
  1731. +  */
  1732. + void vqt_pairkern(int handle, int ch1, int ch2, long *x, long *y)
  1733. + {
  1734. +     _intin[0] = ch1;
  1735. +     _intin[1] = ch2;
  1736. +     /* atari doc is wrong about contrl[3] */
  1737. +     __vdi__(VDI_CONTRL_ENCODE(235, 0, 2, 0), handle);
  1738. +     *x = *((long *)(&_ptsout[0]));
  1739. +     *y = *((long *)(&_ptsout[2]));
  1740. + }
  1741. + #endif /* L_vqt_pair */
  1742. + 
  1743. + #ifdef L_v_getbit
  1744. + 
  1745. + /* Get Character Bitmap Information. This call provides information to allow
  1746. +  * the caller to know the exact size and placement of a given character.  This
  1747. +  * information includes the character's x and y advance vectors, the x and y
  1748. +  * offsets, and the bitmap dimensions of the character. The advance vector
  1749. +  * represents the amount to add to the current point to place the following
  1750. +  * character.  The x and y offsets, when added to the current point, give the
  1751. +  * caller the location of the upper left hand corner of the bitmap.  The width
  1752. +  * and height of the bitmap are returned as 16 bit integers.  All other values
  1753. +  * are returned in fix31 representation.
  1754. +  */
  1755. + void v_getbitmap_info(int handle,
  1756. +                       int ch, 
  1757. +                       long *advancex, long *advancey,
  1758. +                       long *xoffset, long *yoffset,
  1759. +                       int *width, int *height,
  1760. +                       short **bitmap)
  1761. + {
  1762. +     _intin[0] = ch;
  1763. +     __vdi__(VDI_CONTRL_ENCODE(239, 0, 1, 0), handle);
  1764. +     *width = _intout[0];
  1765. +     *height = _intout[1];
  1766. +     *advancex = *((long *)(&_intout[2]));
  1767. +     *advancey = *((long *)(&_intout[4]));
  1768. +     *xoffset = *((long *)(&_intout[6]));
  1769. +     *yoffset = *((long *)(&_intout[8]));
  1770. +     *bitmap = *((short **)(&_intout[10]));
  1771. + }
  1772. + #endif /* L_v_getbit */
  1773.   
  1774.   /* -eof- */
  1775. ===================================================================
  1776. RCS file: /net/acae127/home/bammi/etc/src/master/atari/gemlib/vdiinq.c,v
  1777. retrieving revision 1.9
  1778. diff -c -r1.9 vdiinq.c
  1779. *** 1.9    1992/01/29 19:04:38
  1780. --- vdiinq.c    1993/02/22 06:07:50
  1781. ***************
  1782. *** 25,31 ****
  1783. --- 25,41 ----
  1784.    *    your program was allocating this extra byte anyway for a
  1785.    *    terminating null, but it may kill you if this space was tight!
  1786.    *    THIS IS NOT OFFICIAL yet and it may change!!!
  1787. +  *
  1788. +  *******
  1789. +  *
  1790. +  *      This is official now (jan 93 SpeedoGDOS docs from atari).
  1791. +  *      To quote the doc "A new parameter has been added to this function.
  1792. +  *      It is a flag that indicates whether or not the font in question is
  1793. +  *      an outline font or bitmap font.  The flag will be contained in
  1794. +  *      intin[33]; 0 will signify a bitmap font, and 1 will indicate an 
  1795. +  *      outline font."
  1796.    */
  1797. + 
  1798.   #include "common.h"
  1799.   
  1800.   #ifdef __DEF_ALL__
  1801.